(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 11.3' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     68801,       1944]
NotebookOptionsPosition[     58447,       1783]
NotebookOutlinePosition[     58804,       1799]
CellTagsIndexPosition[     58761,       1796]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Mathematica \:7591\:95ee\:7b14\:8bb0", "Title",
 CellChangeTimes->{{3.782355479983012*^9, 3.782355501229892*^9}, 
   3.7840892908102503`*^9},ExpressionUUID->"b0791c14-250a-412f-8d27-\
81adef44c641"],

Cell[CellGroupData[{

Cell["\:5982\:4f55\:5728\:5f0f\:5b50\:4e2d\:5b58\:5728\:5e38\:6570\:53d8\:91cf\
\:65f6\:8c03\:7528NIntegrate\:ff1a(\:4e0d\:61c2)", "Section",
 CellChangeTimes->{{3.7823555048904624`*^9, 3.7823556425253096`*^9}, {
  3.782357872846201*^9, 
  3.7823578817436657`*^9}},ExpressionUUID->"9db35d91-0bc2-484f-a75c-\
ac60a18e0d3d"],

Cell[BoxData[{
 RowBox[{
  RowBox[{"expr", "=", 
   RowBox[{
    RowBox[{"11.94`", " ", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], " ", 
     RowBox[{
      RowBox[{"Cos", "[", "x", "]"}], "^", "2"}], " ", 
     RowBox[{
      RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}]}], "+", 
    RowBox[{"21.31`", " ", 
     RowBox[{
      RowBox[{"c", "[", 
       RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], " ", 
     RowBox[{
      RowBox[{"Cos", "[", "x", "]"}], "^", "2"}], " ", 
     RowBox[{
      RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}]}], "+", 
    RowBox[{"0.14702`", " ", 
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "1"}], "]"}], " ", 
     RowBox[{"b", "[", 
      RowBox[{"1", ",", "1"}], "]"}], " ", 
     RowBox[{"Cos", "[", "x", "]"}], " ", 
     RowBox[{
      RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}], " ", 
     RowBox[{"Sin", "[", "x", "]"}]}], "-", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1.395`", " ", 
       RowBox[{
        RowBox[{"b", "[", 
         RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], " ", 
       RowBox[{"Cos", "[", "x", "]"}], " ", 
       RowBox[{
        RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}], " ", 
       RowBox[{"Sin", "[", "x", "]"}]}], ")"}], "/", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"x", "/", "2"}]}], ")"}], "^", "3"}]}], "+", 
    RowBox[{"0.4669`", " ", 
     RowBox[{
      RowBox[{"b", "[", 
       RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], " ", 
     RowBox[{
      RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}], " ", 
     RowBox[{
      RowBox[{"Sin", "[", "x", "]"}], "^", "2"}]}], "+", 
    RowBox[{
     RowBox[{"(", 
      RowBox[{"1.395`", " ", 
       RowBox[{
        RowBox[{"b", "[", 
         RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], " ", 
       RowBox[{
        RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}], " ", 
       RowBox[{
        RowBox[{"Sin", "[", "x", "]"}], "^", "2"}]}], ")"}], "/", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{"1", "+", 
        RowBox[{"x", "/", "2"}]}], ")"}], "^", "4"}]}]}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"terms", "=", 
   RowBox[{"List", "@@@", 
    RowBox[{"List", "@@", "expr"}]}]}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"11.94`", ",", 
       RowBox[{
        RowBox[{"a", "[", 
         RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], ",", 
       RowBox[{
        RowBox[{"Cos", "[", "x", "]"}], "^", "2"}], ",", 
       RowBox[{
        RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"21.31`", ",", 
       RowBox[{
        RowBox[{"c", "[", 
         RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], ",", 
       RowBox[{
        RowBox[{"Cos", "[", "x", "]"}], "^", "2"}], ",", 
       RowBox[{
        RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.14702`", ",", 
       RowBox[{"a", "[", 
        RowBox[{"1", ",", "1"}], "]"}], ",", 
       RowBox[{"b", "[", 
        RowBox[{"1", ",", "1"}], "]"}], ",", 
       RowBox[{"Cos", "[", "x", "]"}], ",", 
       RowBox[{
        RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}], ",", 
       RowBox[{"Sin", "[", "x", "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"-", "1.395`"}], ",", 
       RowBox[{"1", "/", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"1", "+", 
           RowBox[{"x", "/", "2"}]}], ")"}], "^", "3"}]}], ",", 
       RowBox[{
        RowBox[{"b", "[", 
         RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], ",", 
       RowBox[{"Cos", "[", "x", "]"}], ",", 
       RowBox[{
        RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}], ",", 
       RowBox[{"Sin", "[", "x", "]"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"0.4669`", ",", 
       RowBox[{
        RowBox[{"b", "[", 
         RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], ",", 
       RowBox[{
        RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}], ",", 
       RowBox[{
        RowBox[{"Sin", "[", "x", "]"}], "^", "2"}]}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"1.395`", ",", 
       RowBox[{"1", "/", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"1", "+", 
           RowBox[{"x", "/", "2"}]}], ")"}], "^", "4"}]}], ",", 
       RowBox[{
        RowBox[{"b", "[", 
         RowBox[{"1", ",", "1"}], "]"}], "^", "2"}], ",", 
       RowBox[{
        RowBox[{"Cos", "[", "\[Theta]", "]"}], "^", "2"}], ",", 
       RowBox[{
        RowBox[{"Sin", "[", "x", "]"}], "^", "2"}]}], "}"}]}], "}"}], "*)"}], 
  "\n"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"integrals", "=", 
   RowBox[{
    RowBox[{
     RowBox[{"GatherBy", "[", 
      RowBox[{"#", ",", 
       RowBox[{
        RowBox[{"MemberQ", "[", 
         RowBox[{"#", ",", 
          RowBox[{"x", "|", "\[Theta]"}], ",", "Infinity"}], "]"}], "&"}]}], 
      "]"}], "&"}], "/@", "terms"}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{
   RowBox[{"(", 
    RowBox[{"Times", "@@@", 
     RowBox[{"integrals", "[", 
      RowBox[{"[", 
       RowBox[{"All", ",", "1"}], "]"}], "]"}]}], ")"}], "*", 
   RowBox[{"(", 
    RowBox[{
     RowBox[{
      RowBox[{"NIntegrate", "[", 
       RowBox[{
        RowBox[{"Times", "@@", "#"}], ",", 
        RowBox[{"{", 
         RowBox[{"\[Theta]", ",", "0", ",", "2"}], "}"}], ",", 
        RowBox[{"{", 
         RowBox[{"x", ",", "0", ",", "1"}], "}"}], ",", 
        RowBox[{"Method", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"Automatic", ",", 
           RowBox[{"\"\<SymbolicProcessing\>\"", "\[Rule]", "0"}]}], 
          "}"}]}]}], "]"}], "&"}], "/@", 
     RowBox[{"integrals", "[", 
      RowBox[{"[", 
       RowBox[{"All", ",", "2"}], "]"}], "]"}]}], ")"}]}], "//", 
  "Total"}], "\n", 
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"7.04119", " ", 
     RowBox[{
      RowBox[{"a", "[", 
       RowBox[{"1", ",", "1"}], "]"}], "^", "2"}]}], "+", 
    RowBox[{"0.0422025", " ", 
     RowBox[{"a", "[", 
      RowBox[{"1", ",", "1"}], "]"}], " ", 
     RowBox[{"b", "[", 
      RowBox[{"1", ",", "1"}], "]"}]}], "+", 
    RowBox[{"0.00809433", " ", 
     RowBox[{
      RowBox[{"b", "[", 
       RowBox[{"1", ",", "1"}], "]"}], "^", "2"}]}], "+", 
    RowBox[{"12.5668", " ", 
     RowBox[{
      RowBox[{"c", "[", 
       RowBox[{"1", ",", "1"}], "]"}], "^", "2"}]}]}], "*)"}]}]}], "Input",
 CellChangeTimes->{
  3.7823556729052453`*^9},ExpressionUUID->"f4847c1b-384f-4c4e-bf12-\
28fadfdf8aa1"],

Cell[BoxData[
 RowBox[{Cell[
  "ParametricNDSolveValue", "ObjectName",ExpressionUUID->
   "86de19b4-aa66-4f85-be10-e3b1c7d189ab"], 
  TemplateBox[{8},
   "Spacer1"]}]], "Input",
 CellChangeTimes->{{3.7840274790388117`*^9, 
  3.7840274848939095`*^9}},ExpressionUUID->"cf7b9e0a-e124-413a-872e-\
49951ff5792d"],

Cell["\:8fd9\:4e2a\:51fd\:6570\:5e94\:8be5\:80fd\:5e2e\:4f60\:ff0c\:56e0\:4e3a\
\:5b83\:662f\[OpenCurlyDoubleQuote]\:5e26\:53c2\:6570\:7684\:5fae\:5206\:65b9\
\:7a0b\:6570\:503c\:89e3\[CloseCurlyDoubleQuote]", "Text",
 CellChangeTimes->{{3.7840274893086033`*^9, 
  3.784027518710757*^9}},ExpressionUUID->"ea3025a7-26f2-464a-8b66-\
eef3bf0208bc"]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:5173\:4e8eRe\:6307\:4ee4\:ff1a", "Section",
 CellChangeTimes->{{3.782355820623989*^9, 
  3.7823558468885326`*^9}},ExpressionUUID->"d617e1e2-0d7d-40ad-a907-\
96a1e952e1ce"],

Cell["Re[x]\:4f1a\:5047\:5b9ax\:662f\:672a\:77e5\:865a\:5b9e\:7684\:53d8\:91cf\
\:ff0c\:5982\:679c\:8981\:5f15\:5165\:5047\:5b9a\:ff0c\:5219\:8981\:7528", \
"Text",
 CellChangeTimes->{{3.7823558551637125`*^9, 
  3.7823559140710077`*^9}},ExpressionUUID->"9ad820fb-c39d-49df-b389-\
ea2636cf9cd3"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Assuming", "[", 
  RowBox[{
   RowBox[{"Element", "[", 
    RowBox[{"x", ",", "Reals"}], "]"}], ",", 
   RowBox[{"Simplify", "[", 
    RowBox[{"Re", "[", 
     RowBox[{"I", " ", "x"}], "]"}], "]"}]}], "]"}]], "Code",
 CellChangeTimes->{{3.7823559236272287`*^9, 3.7823559588923855`*^9}, {
  3.782363969305641*^9, 3.782363969883093*^9}},
 CellLabel->"In[16]:=",ExpressionUUID->"34717b11-a60f-4036-9839-a9573bd0cb67"],

Cell[BoxData["0"], "Output",
 CellChangeTimes->{{3.782363962588941*^9, 3.7823639713522644`*^9}, 
   3.782883180765005*^9},
 CellLabel->"Out[16]=",ExpressionUUID->"e3c26023-7402-473f-9097-b8a7e5b7176c"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:5173\:4e8e\:6c42\:68af\:5ea6", "Section",
 CellChangeTimes->{{3.782817256773983*^9, 
  3.7828172665941744`*^9}},ExpressionUUID->"81c8aa92-f632-46f5-bd78-\
5238b501856f"],

Cell["\:6240\:6709\:6ca1\:6709\:663e\:5f0f\:8ddf\:81ea\:53d8\:91cf\:6709\:5173\
\:7684\:6c42\:5bfc\:6570\:90fd\:5f970", "Text",
 CellChangeTimes->{{3.782817272242034*^9, 
  3.782817309545885*^9}},ExpressionUUID->"5ddd9c39-b0f0-4315-b7a4-\
a3793e1b6342"]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:5173\:4e8e\:6d41\:7ebf\:56fe\:ff1a", "Section",
 CellChangeTimes->{{3.7828831557139587`*^9, 
  3.782883161250164*^9}},ExpressionUUID->"7876031e-7585-4d79-85ab-\
85be692dd090"],

Cell[BoxData[
 RowBox[{
  RowBox[{"myFunction", "[", 
   RowBox[{"x_", ",", "y_"}], "]"}], ":=", 
  RowBox[{
   RowBox[{"x", "^", "2"}], "-", 
   RowBox[{"y", "^", "4"}]}]}]], "Code",
 CellChangeTimes->{3.7828831743321977`*^9},
 CellLabel->"In[18]:=",ExpressionUUID->"36366080-9797-4849-827e-6994399f8119"],

Cell[BoxData[
 RowBox[{
  RowBox[{"myGradient", "[", 
   RowBox[{"x_", ",", "y_"}], "]"}], ":=", 
  RowBox[{"Grad", "[", 
   RowBox[{
    RowBox[{"myFunction", "[", 
     RowBox[{"x", ",", "y"}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"x", ",", "y"}], "}"}]}], "]"}]}]], "Code",
 CellChangeTimes->{3.7828831891119633`*^9},
 CellLabel->"In[19]:=",ExpressionUUID->"2122d0b0-6cd5-4388-91b9-a5590ffb7967"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"StreamPlot", "[", 
  RowBox[{
   RowBox[{"myGradient", "[", 
    RowBox[{"x", ",", "y"}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", "0", ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"y", ",", "0", ",", "1"}], "}"}]}], "]"}]], "Code",
 CellChangeTimes->{{3.782883197133523*^9, 3.7828832254292645`*^9}},
 CellLabel->"In[20]:=",ExpressionUUID->"d9bd346b-6413-4f1e-8d02-60ae0e08fd36"],

Cell[BoxData[
 GraphicsBox[{},
  AspectRatio->1,
  DisplayFunction->Identity,
  Frame->True,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImageSize->{92., Automatic},
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "TransparentPolygonMesh" -> True},
  PlotRange->{{0., 1.}, {0., 1.}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.782883226517356*^9},
 CellLabel->"Out[20]=",ExpressionUUID->"29427d55-2ec1-40d3-b7fd-69ea0cbba050"]
}, Open  ]],

Cell["\<\
\:4e0a\:9762\:7684\:4ee3\:7801\:7ed9\:51fa\:7a7a\:7684\:56fe\:ff0c\:4e0b\:9762\
\:8fd9\:4e2a\:4e5f\:662f\:ff1a\
\>", "Text",
 CellChangeTimes->{{3.7828832375468793`*^9, 
  3.7828832580411015`*^9}},ExpressionUUID->"7d3e1765-b77b-4b65-a5b4-\
22fbf0f4301e"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"u", "[", 
   RowBox[{"x_", ",", "y_"}], "]"}], "=", 
  RowBox[{"2", " ", "x", " ", "y"}]}]], "Code",
 CellChangeTimes->{3.782883267887786*^9},
 CellLabel->"In[21]:=",ExpressionUUID->"c8899b80-5c4e-43d9-a1ad-be3b65fc739b"],

Cell[BoxData[
 RowBox[{"2", " ", "x", " ", "y"}]], "Output",
 CellChangeTimes->{3.7828832688442397`*^9},
 CellLabel->"Out[21]=",ExpressionUUID->"3f324fcf-c178-4861-ab04-2d0fd74a05e6"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"StreamPlot", "[", 
  RowBox[{
   RowBox[{"Grad", "[", 
    RowBox[{
     RowBox[{"u", "[", 
      RowBox[{"x", ",", "y"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", "y"}], "}"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", ",", 
     RowBox[{"-", "1"}], ",", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"y", ",", 
     RowBox[{"-", "1"}], ",", "1"}], "}"}]}], "]"}]], "Code",
 CellChangeTimes->{3.7828832831716623`*^9},
 CellLabel->"In[22]:=",ExpressionUUID->"31498a72-acb8-4820-9487-d303b1dcc293"],

Cell[BoxData[
 GraphicsBox[{},
  AspectRatio->1,
  DisplayFunction->Identity,
  Frame->True,
  FrameTicks->{{Automatic, Automatic}, {Automatic, Automatic}},
  GridLinesStyle->Directive[
    GrayLevel[0.5, 0.4]],
  ImageSize->{115., Automatic},
  Method->{
   "DefaultBoundaryStyle" -> Automatic, "TransparentPolygonMesh" -> True},
  PlotRange->{{-1., 1.}, {-1., 1.}},
  PlotRangeClipping->True,
  PlotRangePadding->{{
     Scaled[0.05], 
     Scaled[0.05]}, {
     Scaled[0.05], 
     Scaled[0.05]}},
  Ticks->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.782883284324582*^9},
 CellLabel->"Out[22]=",ExpressionUUID->"1a5b3219-ec61-4ac7-95ac-d6624c25accc"]
}, Open  ]],

Cell["\:89e3\:51b3\:529e\:6cd5\:5982\:4e0b\:ff1a", "Text",
 CellChangeTimes->{{3.782884158049058*^9, 
  3.7828841626467686`*^9}},ExpressionUUID->"0d898e99-e5f7-4e32-936a-\
f1cb78073d5c"],

Cell[BoxData[
 RowBox[{"Hyperlink", "[", 
  RowBox[{
  "\"\<Solution\>\"", ",", 
   "\"\<https://community.wolfram.com/groups/-/m/t/1610629\>\""}], 
  "]"}]], "Code",
 CellChangeTimes->{{3.7828841660027995`*^9, 3.782884184582143*^9}},
 CellLabel->"In[36]:=",ExpressionUUID->"7456b96c-3eed-43f3-9daa-498e002137c1"],

Cell[BoxData[
 TemplateBox[{
  "\"Solution\"","https://community.wolfram.com/groups/-/m/t/1610629"},
  "HyperlinkURL"]], "Subsubsection",
 CellChangeTimes->{{3.7828841854398503`*^9, 3.782884188426867*^9}, 
   3.7831429040335016`*^9},ExpressionUUID->"0c601505-6dae-40b1-b0c8-\
fd076877ff42"],

Cell[CellGroupData[{

Cell["\:65e0\:9650\:6c42\:548c", "Subsection",
 CellChangeTimes->{{3.7831459389915295`*^9, 
  3.7831459434680634`*^9}},ExpressionUUID->"dae2e418-d993-4db3-9730-\
c6d89f3e6452"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Limit", "[", 
  RowBox[{
   RowBox[{"Sum", "[", 
    RowBox[{
     RowBox[{"1", "+", 
      RowBox[{"z", "^", "i"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "n"}], "}"}]}], "]"}], ",", 
   RowBox[{"n", "\[Rule]", "Infinity"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.783145550299278*^9, 3.7831456426100073`*^9}, {
  3.7831458177169957`*^9, 3.783145819129419*^9}, {3.7831458608152075`*^9, 
  3.7831458872811337`*^9}},
 CellLabel->"In[61]:=",ExpressionUUID->"e7169940-c3f9-40f6-aa17-69f2a8fa2cdd"],

Cell[BoxData[
 RowBox[{"ConditionalExpression", "[", 
  RowBox[{"\[Infinity]", ",", 
   RowBox[{
    RowBox[{"z", ">", "1"}], "&&", 
    RowBox[{
     RowBox[{"Log", "[", "z", "]"}], ">", "0"}]}]}], "]"}]], "Output",
 CellChangeTimes->{3.7831459589115963`*^9},
 CellLabel->"Out[61]=",ExpressionUUID->"5e29dc01-4ea3-415d-a96c-9b10117a271a"]
}, Open  ]],

Cell["\:4e3a\:4f55condition\:4e0d\:5305\:62ecz<1?", "Text",
 CellChangeTimes->{{3.7831459637687073`*^9, 
  3.7831459844164224`*^9}},ExpressionUUID->"4ba60dda-70f2-4959-8c7a-\
b83465972905"]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:5173\:4e8ewolfram alpha", "Subsection",
 CellChangeTimes->{{3.7831459908369303`*^9, 
  3.783145999877789*^9}},ExpressionUUID->"2912760d-b74b-4577-a5fb-\
a2b0685032d4"],

Cell["\:6211\:7528alpha\:6765\:67e5\:8be21/(1-z)\:7684\:7ea7\:6570\:5c55\:5f00\
\:ff0c\:4f46\:662f\:7ed9\:51fa\:6765\:7684\:7ed3\:679c\:4e0d\:5168", "Text",
 CellChangeTimes->{{3.7831460122056284`*^9, 
  3.7831460490183454`*^9}},ExpressionUUID->"dca55732-5f2c-460d-89be-\
1e0e696cea5c"]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:770b\:4e0d\:61c2\:7684\:7ed3\:679c\:5f0f", "Subsection",
 CellChangeTimes->{{3.783147436495679*^9, 
  3.783147446029641*^9}},ExpressionUUID->"03ff4d8b-e352-46fb-a85d-\
7162656ddae6"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Limit", "[", 
  RowBox[{
   RowBox[{"Sum", "[", 
    RowBox[{
     RowBox[{"1", "+", 
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"0.3", "I"}], ")"}], "^", "i"}], " ", 
       RowBox[{"(", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"2", "^", 
            RowBox[{"(", 
             RowBox[{"i", "+", "1"}], ")"}]}], "-", "1"}], ")"}], "/", 
         RowBox[{"2", "^", 
          RowBox[{"(", 
           RowBox[{"i", "+", "1"}], ")"}]}]}], ")"}]}]}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "n"}], "}"}]}], "]"}], ",", 
   RowBox[{"n", "\[Rule]", "Infinity"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.783145550299278*^9, 3.7831456426100073`*^9}, {
  3.7831458177169957`*^9, 3.783145819129419*^9}, {3.7831458608152075`*^9, 
  3.7831458872811337`*^9}, {3.7831470161443076`*^9, 3.7831470843501835`*^9}, {
  3.7831471254461613`*^9, 3.7831471278510914`*^9}, {3.783147204045436*^9, 
  3.7831472874341545`*^9}, {3.7831473597822385`*^9, 3.7831474108908443`*^9}},
 CellLabel->"In[62]:=",ExpressionUUID->"cfeb1856-ba51-4d20-8fbc-6eff75490876"],

Cell[BoxData[
 TagBox[
  RowBox[{
   TagBox[
    RowBox[{"(", 
     RowBox[{"1.`", "\[VeryThinSpace]", "+", 
      RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ")"}],
    "DirectedInfinityCoefficient",
    Editable->True], " ", "\[Infinity]"}],
  DirectedInfinity,
  Editable->False]], "Output",
 CellChangeTimes->{3.783147469470271*^9},
 CellLabel->"Out[62]=",ExpressionUUID->"77a9e881-1e5c-4841-8f8c-a94dbd9f91a9"]
}, Open  ]],

Cell[TextData[{
 "\:8fd8\:6709\:4ec0\:4e48",
 Cell[BoxData["Indeterminate"], "Output",
  CellChangeTimes->{3.7832423095121155`*^9},ExpressionUUID->
  "988a82c9-f7f7-430b-81fa-985c4d8592c9"],
 "\:ff0cComplexInfinity, Infinity"
}], "Text",
 CellChangeTimes->{{3.783242332167848*^9, 
  3.783242371050273*^9}},ExpressionUUID->"e9240b24-8363-492f-8599-\
8b8c90f4012f"],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.7823639377458754`*^9, 
  3.7823639515464487`*^9}},ExpressionUUID->"4272c8ac-899b-4083-a0ad-\
9c5501a8b83e"]
}, Open  ]],

Cell["Active\:51fd\:6570", "Subsection",
 CellChangeTimes->{{3.7836570953338575`*^9, 
  3.7836571027400827`*^9}},ExpressionUUID->"9f251f11-abc9-4fb1-8d36-\
0e0443845e8c"],

Cell[CellGroupData[{

Cell["\:5b9a\:4e49\:96c6\:5408", "Subsection",
 CellChangeTimes->{{3.783678604671644*^9, 
  3.7836786058664474`*^9}},ExpressionUUID->"af14e2a2-35a4-4de2-b726-\
88165dde651d"],

Cell["\:600e\:4e48\:5b9a\:4e49\:4e00\:4e2a\:96c6\:5408\:ff1f\:6bd4\:5982\:6211\
\:8981\:5b9a\:4e49\:4e00\:4e2a\:96c6\:5408\:ff1aa={x | x<1 }   \:8fd9\:4ef6\
\:4e8b\:5e94\:8be5\:5982\:4f55\:5b9e\:73b0\:5462\:ff1f", "Text",
 CellChangeTimes->{{3.7836786156742153`*^9, 
  3.783678686136351*^9}},ExpressionUUID->"00dc9872-629a-4b69-849d-\
01b8b7febe92"],

Cell[BoxData[
 RowBox[{"Hyperlink", "[", 
  RowBox[{
  "\"\<\:5b9a\:4e49\:96c6\:5408\>\"", ",", 
   "\"\<https://mathematica.stackexchange.com/questions/5325/define-a-\
mathematical-set\>\""}], "]"}]], "Input",
 CellChangeTimes->{{3.7836786092244663`*^9, 3.7836786092354364`*^9}, {
  3.783678691130994*^9, 3.783678725518529*^9}},
 CellLabel->"In[9]:=",ExpressionUUID->"3d8fa36e-d48b-406b-b0ff-576831c1a8d1"],

Cell[BoxData[
 TemplateBox[{
  "\"\:5b9a\:4e49\:96c6\:5408\"",
   "https://mathematica.stackexchange.com/questions/5325/define-a-\
mathematical-set"},
  "HyperlinkURL"]], "Subsubsection",
 CellChangeTimes->{{3.783678726639533*^9, 3.7836787295456753`*^9}},
 CellLabel->"Out[21]=",ExpressionUUID->"822388ad-513a-49e1-bb86-b274f14dd256"]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["", "Section",ExpressionUUID->"581165c8-364a-4c80-9aa0-7f36b64defaf"],

Cell["\:8fd9\:4e2a\:5f0f\:5b50\:4e3a\:4ec0\:4e48\:8981\:8fd0\:884c\:90a3\:4e48\
\:4e45\:ff1f", "Text",
 CellChangeTimes->{{3.783763988339924*^9, 
  3.783764003605715*^9}},ExpressionUUID->"92308502-4e79-4874-8415-\
8769842fed6b"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FourierSeries", "[", 
  RowBox[{
   RowBox[{"2", "l", " ", 
    RowBox[{"SawtoothWave", "[", 
     RowBox[{"x", "/", 
      RowBox[{"(", 
       RowBox[{"2", "l"}], ")"}]}], "]"}]}], ",", "x", ",", "3", ",", 
   RowBox[{"FourierParameters", " ", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"1", ",", "l"}], "}"}]}]}], "]"}]], "Input",
 CellLabel->
  "In[152]:=",ExpressionUUID->"66cddb72-a668-463d-be57-b9325d145a68"],

Cell[BoxData["$Aborted"], "Output",
 CellChangeTimes->{3.783763983993932*^9},
 CellLabel->
  "Out[152]=",ExpressionUUID->"176c9cb0-ec40-45a6-9ac8-ed2721ee80c5"]
}, Open  ]],

Cell["\:8fd9\:4e2a\:8f93\:51fa\:662f\:5565\:610f\:601d\:ff1f", "Text",
 CellChangeTimes->{{3.783822728307779*^9, 
  3.7838227369317145`*^9}},ExpressionUUID->"505b367d-c02b-4980-9948-\
03e314a8ccf3"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"D", "[", 
  RowBox[{
   RowBox[{"1", "/", 
    RowBox[{"Exp", "[", 
     RowBox[{"1", "/", "z"}], "]"}]}], ",", 
   RowBox[{"{", 
    RowBox[{"z", ",", "n"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.78382254785532*^9, 3.783822621680084*^9}},
 CellLabel->
  "In[200]:=",ExpressionUUID->"5d03b378-e22b-4695-aacd-100a7df57251"],

Cell[BoxData[
 RowBox[{
  RowBox[{"n", "!"}], " ", 
  RowBox[{
   RowBox[{"DifferenceRoot", "[", 
    RowBox[{"Function", "[", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"\[FormalY]", ",", "\[FormalN]"}], "}"}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"\[FormalN]", " ", 
           RowBox[{"\[FormalY]", "[", "\[FormalN]", "]"}]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"-", "1"}], "+", 
             RowBox[{"2", " ", "z"}], "+", 
             RowBox[{"2", " ", "\[FormalN]", " ", "z"}]}], ")"}], " ", 
           RowBox[{"\[FormalY]", "[", 
            RowBox[{"1", "+", "\[FormalN]"}], "]"}]}], "+", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"2", "+", "\[FormalN]"}], ")"}], " ", 
           SuperscriptBox["z", "2"], " ", 
           RowBox[{"\[FormalY]", "[", 
            RowBox[{"2", "+", "\[FormalN]"}], "]"}]}]}], "\[Equal]", "0"}], 
        ",", 
        RowBox[{
         RowBox[{"\[FormalY]", "[", "0", "]"}], "\[Equal]", 
         SuperscriptBox["\[ExponentialE]", 
          RowBox[{
           RowBox[{"-", "1"}], "/", "z"}]]}], ",", 
        RowBox[{
         RowBox[{"\[FormalY]", "[", "1", "]"}], "\[Equal]", 
         FractionBox[
          SuperscriptBox["\[ExponentialE]", 
           RowBox[{
            RowBox[{"-", "1"}], "/", "z"}]], 
          SuperscriptBox["z", "2"]]}]}], "}"}]}], "]"}], "]"}], "[", "n", 
   "]"}]}]], "Output",
 CellChangeTimes->{3.7838227208726206`*^9},
 CellLabel->
  "Out[200]=",ExpressionUUID->"56abf7fe-ed28-4a02-bd2a-1cb3c0d950b7"]
}, Open  ]],

Cell["\:5c06 || \:7684\:7ed3\:679c\:8f6c\:5316\:4e3a\:89c4\:5219", "Text",
 CellChangeTimes->{{3.7838437912964506`*^9, 
  3.783843817073042*^9}},ExpressionUUID->"a5a0bce5-9cc3-4b71-b65b-\
a74cbf429d47"],

Cell[BoxData[
 RowBox[{"ToRules", "[", 
  RowBox[{"Element", "[", 
   RowBox[{"x", ",", "Integers"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.7838438223704157`*^9, 3.7838438295483403`*^9}, {
  3.783844142415786*^9, 
  3.783844161544017*^9}},ExpressionUUID->"0c501d7b-9dbb-42ed-bca0-\
9178a7f0ef69"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Reduce", "[", 
  RowBox[{
   RowBox[{"Element", "[", 
    RowBox[{"x", ",", "Integers"}], "]"}], "&&", 
   RowBox[{"0", "<", "x", "<", "10"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.7838441680910587`*^9, 3.783844206294964*^9}},
 CellLabel->
  "In[240]:=",ExpressionUUID->"31bcd2b8-6e24-43b0-b05f-1380afd68b41"],

Cell[BoxData[
 RowBox[{
  RowBox[{"x", "\[Equal]", "1"}], "||", 
  RowBox[{"x", "\[Equal]", "2"}], "||", 
  RowBox[{"x", "\[Equal]", "3"}], "||", 
  RowBox[{"x", "\[Equal]", "4"}], "||", 
  RowBox[{"x", "\[Equal]", "5"}], "||", 
  RowBox[{"x", "\[Equal]", "6"}], "||", 
  RowBox[{"x", "\[Equal]", "7"}], "||", 
  RowBox[{"x", "\[Equal]", "8"}], "||", 
  RowBox[{"x", "\[Equal]", "9"}]}]], "Output",
 CellChangeTimes->{3.7838442096519856`*^9},
 CellLabel->
  "Out[240]=",ExpressionUUID->"049b48a5-0b46-4879-9e77-f6f3a9f09674"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"Table", "[", 
  RowBox[{
   RowBox[{"Reduce", "[", 
    RowBox[{
     RowBox[{"Element", "[", 
      RowBox[{"x", ",", "Integers"}], "]"}], "&&", 
     RowBox[{"0", "<", "x", "<", "i"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "1", ",", "50"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.7838442142142906`*^9, 3.783844245496173*^9}, {
  3.783846161073588*^9, 3.7838461736083975`*^9}},
 CellLabel->
  "In[242]:=",ExpressionUUID->"08a13c17-d6b0-49ef-9bf2-ecfa65846553"],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 2}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->RGBColor[0, 0, 1],
 CellSize->{
  Inherited, 4},ExpressionUUID->"0c43c13a-3fd9-4e81-aafb-fb1d826afb9c"],

Cell["\:4e0d\:8fc7\:6211\:5e94\:8be5\:600e\:4e48\:628a\:8fd9\:4e9b\:7ed3\:679c\
\:5206\:5f00\:5462\:ff1f", "Text",
 CellChangeTimes->{{3.783851991179101*^9, 
  3.7838520060314393`*^9}},ExpressionUUID->"64d4a664-42c1-49ff-b826-\
1c6cfed78ffe"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"False", ",", 
   RowBox[{"x", "\[Equal]", "1"}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}], "||", 
    RowBox[{"x", "\[Equal]", "3"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}], "||", 
    RowBox[{"x", "\[Equal]", "3"}], "||", 
    RowBox[{"x", "\[Equal]", "4"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}], "||", 
    RowBox[{"x", "\[Equal]", "3"}], "||", 
    RowBox[{"x", "\[Equal]", "4"}], "||", 
    RowBox[{"x", "\[Equal]", "5"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}], "||", 
    RowBox[{"x", "\[Equal]", "3"}], "||", 
    RowBox[{"x", "\[Equal]", "4"}], "||", 
    RowBox[{"x", "\[Equal]", "5"}], "||", 
    RowBox[{"x", "\[Equal]", "6"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}], "||", 
    RowBox[{"x", "\[Equal]", "3"}], "||", 
    RowBox[{"x", "\[Equal]", "4"}], "||", 
    RowBox[{"x", "\[Equal]", "5"}], "||", 
    RowBox[{"x", "\[Equal]", "6"}], "||", 
    RowBox[{"x", "\[Equal]", "7"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}], "||", 
    RowBox[{"x", "\[Equal]", "3"}], "||", 
    RowBox[{"x", "\[Equal]", "4"}], "||", 
    RowBox[{"x", "\[Equal]", "5"}], "||", 
    RowBox[{"x", "\[Equal]", "6"}], "||", 
    RowBox[{"x", "\[Equal]", "7"}], "||", 
    RowBox[{"x", "\[Equal]", "8"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}], "||", 
    RowBox[{"x", "\[Equal]", "3"}], "||", 
    RowBox[{"x", "\[Equal]", "4"}], "||", 
    RowBox[{"x", "\[Equal]", "5"}], "||", 
    RowBox[{"x", "\[Equal]", "6"}], "||", 
    RowBox[{"x", "\[Equal]", "7"}], "||", 
    RowBox[{"x", "\[Equal]", "8"}], "||", 
    RowBox[{"x", "\[Equal]", "9"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Equal]", "1"}], "||", 
    RowBox[{"x", "\[Equal]", "2"}], "||", 
    RowBox[{"x", "\[Equal]", "3"}], "||", 
    RowBox[{"x", "\[Equal]", "4"}], "||", 
    RowBox[{"x", "\[Equal]", "5"}], "||", 
    RowBox[{"x", "\[Equal]", "6"}], "||", 
    RowBox[{"x", "\[Equal]", "7"}], "||", 
    RowBox[{"x", "\[Equal]", "8"}], "||", 
    RowBox[{"x", "\[Equal]", "9"}], "||", 
    RowBox[{"x", "\[Equal]", "10"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "11"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "12"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "13"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "14"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "15"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "16"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "17"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "18"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "19"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "20"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "21"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "22"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "23"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "24"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "25"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "26"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "27"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "28"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "29"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "30"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "31"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "32"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "33"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "34"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "35"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "36"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "37"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "38"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "39"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "40"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "41"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "42"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "43"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "44"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "45"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "46"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "47"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "48"}]}], ",", 
   RowBox[{
    RowBox[{"x", "\[Element]", 
     TemplateBox[{},
      "Integers"]}], "&&", 
    RowBox[{"1", "\[LessEqual]", "x", "\[LessEqual]", "49"}]}]}], 
  "}"}]], "Output",
 CellChangeTimes->{3.783844247228523*^9, 3.7838461748101807`*^9},
 CellLabel->
  "Out[242]=",ExpressionUUID->"85a2ebde-c33f-42b7-91a2-189f60d000b7"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"FunctionRange", "[", 
  RowBox[{
   RowBox[{"Reduce", "[", 
    RowBox[{"Reduce", "[", 
     RowBox[{
      RowBox[{"Element", "[", 
       RowBox[{"x", ",", "Integers"}], "]"}], "&&", 
      RowBox[{"0", "<", "x", "<", "14"}]}], "]"}], "]"}], ","}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.7839407346573534`*^9, 3.783940776173992*^9}, {
  3.7839408500022907`*^9, 
  3.7839408685196323`*^9}},ExpressionUUID->"5c492378-dde6-4f04-a90e-\
0b2aad6e6540"],

Cell[BoxData[
 TemplateBox[{
  "FunctionRange","argtu",
   "\"\:8c03\:7528 \\!\\(\\*RowBox[{\\\"FunctionRange\\\"}]\\) \:65f6\:4f7f\
\:7528\:4e86 1 \:4e2a\:53c2\:6570\:ff1b\:5e94\:8be5\:7528 \\!\\(\\*RowBox[{\\\
\"3\\\"}]\\) \:4e2a\:6216 \\!\\(\\*RowBox[{\\\"4\\\"}]\\) \:4e2a\:53c2\:6570.\
\"",2,44,4,27764903657178756408,"Local"},
  "MessageTemplate"]], "Message", "MSG",
 CellChangeTimes->{3.783940863403352*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[44]:=",ExpressionUUID->"13b2747a-e189-4c85-9740-\
6e80f9be1d43"]
}, Open  ]],

Cell["\:597d\:4e86\:6211\:77e5\:9053\:4e86\:ff0c\:7528Solve\:6307\:4ee4\
\[Ellipsis]\[Ellipsis]damn", "Text",
 CellChangeTimes->{{3.7839409887337313`*^9, 
  3.78394100418093*^9}},ExpressionUUID->"b9e6b397-d837-41ff-a932-\
e915f70b7cae"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Solve", "[", 
  RowBox[{
   RowBox[{"Element", "[", 
    RowBox[{"x", ",", "Integers"}], "]"}], "&&", 
   RowBox[{"0", "<", "x", "<", "114"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.783940916954149*^9, 3.7839409557466726`*^9}},
 CellLabel->"In[46]:=",ExpressionUUID->"83c0d8f9-8db8-4c90-b68b-d75a70b9d631"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "1"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "2"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "3"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "4"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "5"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "6"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "7"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "8"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "9"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "10"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "11"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "12"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "13"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "14"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "15"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "16"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "17"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "18"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "19"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "20"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "21"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "22"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "23"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "24"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "25"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "26"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "27"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "28"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "29"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "30"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "31"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "32"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "33"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "34"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "35"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "36"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "37"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "38"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "39"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "40"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "41"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "42"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "43"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "44"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "45"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "46"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "47"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "48"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "49"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "50"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "51"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "52"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "53"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "54"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "55"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "56"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "57"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "58"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "59"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "60"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "61"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "62"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "63"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "64"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "65"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "66"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "67"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "68"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "69"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "70"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "71"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "72"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "73"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "74"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "75"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "76"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "77"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "78"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "79"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "80"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "81"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "82"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "83"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "84"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "85"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "86"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "87"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "88"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "89"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "90"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "91"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "92"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "93"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "94"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "95"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "96"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "97"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "98"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "99"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "100"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "101"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "102"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "103"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "104"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "105"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "106"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "107"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "108"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "109"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "110"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "111"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "112"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"x", "\[Rule]", "113"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.783940948894766*^9, 3.7839409564966764`*^9}},
 CellLabel->"Out[46]=",ExpressionUUID->"edfb1e6b-d01c-46c9-a294-e3957a5ea27d"]
}, Open  ]],

Cell[BoxData[""], "Input",
 CellChangeTimes->{{3.7839408047938995`*^9, 
  3.7839408113173046`*^9}},ExpressionUUID->"4031cdaa-5bf6-425c-9d05-\
bd901b56239f"],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 2}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->RGBColor[0, 0, 1],
 CellSize->{
  Inherited, 4},ExpressionUUID->"6080ea13-64d7-42cd-b5da-4ec8c7cb34d2"],

Cell[BoxData[
 RowBox[{
  RowBox[{"n", "=", "1"}], ";"}]], "Input",
 CellChangeTimes->{{3.7850076163557863`*^9, 3.7850076176702724`*^9}},
 CellLabel->"In[22]:=",ExpressionUUID->"48a2b581-74c6-47a6-b415-b297b90dca11"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Module", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"x", ",", "y"}], "}"}], ",", 
   RowBox[{"While", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"(", 
         RowBox[{"n", "+", "1"}], ")"}], "^", "2"}], "-", 
       RowBox[{"n", "^", "2"}]}], "<", "10"}], ",", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"x", "=", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"n", "+", "1"}], ")"}], "^", "2"}]}], ",", 
        RowBox[{"y", "=", 
         RowBox[{"n", "^", "2"}]}], ",", 
        RowBox[{"Print", "[", "y", "]"}]}], "}"}], ";", 
      RowBox[{"n", "++"}]}]}], "]"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.7850077086772413`*^9, 3.7850077524301076`*^9}},
 CellLabel->"In[24]:=",ExpressionUUID->"19478e62-148f-42a1-b6b9-7e7909722743"],

Cell[CellGroupData[{

Cell[BoxData["1"], "Print",
 CellChangeTimes->{{3.7850077774182644`*^9, 3.785007788313291*^9}},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[24]:=",ExpressionUUID->"7ae1db70-482a-4bde-853b-\
e6daea80e3dc"],

Cell[BoxData["4"], "Print",
 CellChangeTimes->{{3.7850077774182644`*^9, 3.7850077883381815`*^9}},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[24]:=",ExpressionUUID->"81480576-8415-4f52-b156-\
903cd4b08ce4"],

Cell[BoxData["9"], "Print",
 CellChangeTimes->{{3.7850077774182644`*^9, 3.7850077883790717`*^9}},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[24]:=",ExpressionUUID->"f4af2852-a419-48e0-b603-\
eea78de11d40"],

Cell[BoxData["16"], "Print",
 CellChangeTimes->{{3.7850077774182644`*^9, 3.785007788414975*^9}},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[24]:=",ExpressionUUID->"5a6cdd9d-03ac-474b-8ecf-\
cfbcbfcce986"]
}, Open  ]]
}, Open  ]],

Cell[BoxData[
 RowBox[{"While", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"x", "-", "y"}], "<", "20"}], ",", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"x", "=", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{"n", "+", "1"}], ")"}], "^", "2"}]}], ",", 
      RowBox[{"y", "=", 
       RowBox[{"n", "^", "2"}]}], ",", 
      RowBox[{"Print", "[", "y", "]"}]}], "}"}], ";", 
    RowBox[{"n", "++"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.785007627221165*^9, 3.7850076356875744`*^9}},
 CellLabel->"In[23]:=",ExpressionUUID->"ab25118d-b706-4dc2-b77d-51ebef4e93d9"],

Cell["while\:5faa\:73af\:662f\:4e0d\:662f\:4e0d\:80fd\:5c06\:8fc7\:7a0b\:4e2d\
\:4ea7\:751f\:7684\:91cf\:4f5c\:4e3a\:5224\:65ad\:5f0f\:ff1f", "Text",
 CellChangeTimes->{{3.785007802277505*^9, 
  3.785007835448442*^9}},ExpressionUUID->"109a586c-0445-4a8c-91e6-\
2926c01a8d59"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Module", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"n", ",", "y", ",", "x"}], "}"}], ",", 
   RowBox[{
    RowBox[{"n", "=", "1"}], ";", 
    RowBox[{"y", "=", "1"}], ";", 
    RowBox[{"x", "=", "1"}], ";", 
    RowBox[{"While", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"x", "+", "y"}], "<", "1000"}], ",", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"x", "=", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"n", "+", "1"}], ")"}], "^", "2"}]}], ",", 
         RowBox[{"y", "=", 
          RowBox[{"n", "^", "2"}]}], ",", 
         RowBox[{"Print", "[", "y", "]"}]}], "}"}], ";", 
       RowBox[{"n", "++"}]}]}], "]"}]}]}], "]"}]], "Input",
 CellLabel->"In[25]:=",ExpressionUUID->"1ad9a826-baf9-4de2-b4cb-83bfcf969050"],

Cell[CellGroupData[{

Cell[BoxData["1"], "Print",
 CellChangeTimes->{3.785008792049861*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"6b7f985b-95c1-4832-a5ef-\
08bfca7451ea"],

Cell[BoxData["4"], "Print",
 CellChangeTimes->{3.785008792068756*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"043d5f3d-faa0-49e6-b703-\
37f1cfd3f37b"],

Cell[BoxData["9"], "Print",
 CellChangeTimes->{3.785008792109646*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"9f2631e0-9cd3-4e12-9bbc-\
c19f4b57520a"],

Cell[BoxData["16"], "Print",
 CellChangeTimes->{3.785008792140581*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"5fa5c29e-4886-48bd-bb72-\
c5b785bd915d"],

Cell[BoxData["25"], "Print",
 CellChangeTimes->{3.785008792171481*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"e3322224-3568-4d0e-bdc3-\
d98032c959c0"],

Cell[BoxData["36"], "Print",
 CellChangeTimes->{3.785008792203393*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"2f7a9e63-2912-4e21-baa8-\
85fa698ad2d6"],

Cell[BoxData["49"], "Print",
 CellChangeTimes->{3.7850087922353096`*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"f0c21559-22b7-435c-baf5-\
942d9c70d84e"],

Cell[BoxData["64"], "Print",
 CellChangeTimes->{3.785008792265229*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"657ee328-8194-4687-8342-\
def7e5e8bc13"],

Cell[BoxData["81"], "Print",
 CellChangeTimes->{3.785008792296147*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"ff4c2656-dbea-4b06-8a5d-\
a2054b28f28e"],

Cell[BoxData["100"], "Print",
 CellChangeTimes->{3.785008792324071*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"f83b3a53-b93a-4c0d-9ea3-\
0130cc65310f"],

Cell[BoxData["121"], "Print",
 CellChangeTimes->{3.7850087923519983`*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"8a9bfa25-aee7-4015-a60c-\
7831055c1582"],

Cell[BoxData["144"], "Print",
 CellChangeTimes->{3.7850087923809185`*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"39961c92-5314-42cb-baab-\
75128707a424"],

Cell[BoxData["169"], "Print",
 CellChangeTimes->{3.785008792410839*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"17ecca1d-65f0-434f-a023-\
852354c3705e"],

Cell[BoxData["196"], "Print",
 CellChangeTimes->{3.785008792439762*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"2e0d23b4-aa5c-4e81-aa8c-\
ff4d771e67aa"],

Cell[BoxData["225"], "Print",
 CellChangeTimes->{3.78500879246669*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"f62d4069-3062-4f6d-a01a-\
e99e8a1990e5"],

Cell[BoxData["256"], "Print",
 CellChangeTimes->{3.7850087924966106`*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"7b67cf10-631e-4176-a8c6-\
a66bc14fbd36"],

Cell[BoxData["289"], "Print",
 CellChangeTimes->{3.7850087925245366`*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"3e8d8c7f-9775-4129-ab18-\
116149706487"],

Cell[BoxData["324"], "Print",
 CellChangeTimes->{3.78500879255346*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"3a512592-3973-475b-a63c-\
e1832c306128"],

Cell[BoxData["361"], "Print",
 CellChangeTimes->{3.7850087925813847`*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"34f9ecb2-f45d-44d0-8706-\
5d9800698b2e"],

Cell[BoxData["400"], "Print",
 CellChangeTimes->{3.7850087926103063`*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"9f57bea9-9af4-4c6e-8b3b-\
390f64e8a25a"],

Cell[BoxData["441"], "Print",
 CellChangeTimes->{3.7850087926392293`*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"459ce302-0909-4288-ab5f-\
55eed34d81da"],

Cell[BoxData["484"], "Print",
 CellChangeTimes->{3.78500879266516*^9},
 CellLabel->
  "\:6b63\:5728\:8ba1\:7b97In[25]:=",ExpressionUUID->"b80ca90c-f438-487c-bb3d-\
69823211b503"]
}, Open  ]]
}, Open  ]],

Cell["\:5e94\:8be5\:662f\:6211\:54ea\:91cc\:5199\:9519\:4e86\:624d\:4f1a\:6709\
\:521a\:521a\:90a3\:4e2a\:95ee\:9898\:3002", "Text",
 CellChangeTimes->{{3.785008799280481*^9, 
  3.7850088127786803`*^9}},ExpressionUUID->"e7d8c53b-a135-4763-8292-\
d2cef63aed9b"],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 2}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->RGBColor[0, 0, 1],
 CellSize->{
  Inherited, 4},ExpressionUUID->"1a5fa7a4-7364-420b-8a43-d812386ab98f"],

Cell[BoxData[
 RowBox[{
  RowBox[{"Chasing", "[", 
   RowBox[{"A_", ",", "b_"}], "]"}], ":=", 
  RowBox[{"Module", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
     "c", ",", "d", ",", "u", ",", "l", ",", "i", ",", "n", ",", "x", ",", 
      "k"}], "}"}], ",", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"c", "=", 
      RowBox[{
       RowBox[{
        RowBox[{"Dimensions", "[", "A", "]"}], "//", "Flatten"}], "//", 
       "First"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"d", "=", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"A", "[", 
         RowBox[{"[", 
          RowBox[{"i", ",", "i"}], "]"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"i", ",", "1", ",", "c"}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"u", "=", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"A", "[", 
         RowBox[{"[", 
          RowBox[{
           RowBox[{"i", "-", "1"}], ",", "i"}], "]"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"i", ",", "2", ",", "c"}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"l", "=", 
      RowBox[{"Table", "[", 
       RowBox[{
        RowBox[{"A", "[", 
         RowBox[{"[", 
          RowBox[{"i", ",", 
           RowBox[{"i", "+", "1"}]}], "]"}], "]"}], ",", 
        RowBox[{"{", 
         RowBox[{"i", ",", "1", ",", 
          RowBox[{"c", "-", "1"}]}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"i", "=", "2"}], ";", "\[IndentingNewLine]", 
     RowBox[{"k", "=", "b"}], ";", "\[IndentingNewLine]", 
     RowBox[{"While", "[", 
      RowBox[{
       RowBox[{"i", "<", 
        RowBox[{"c", "+", "1"}]}], ",", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{
           RowBox[{"l", "[", 
            RowBox[{"[", 
             RowBox[{"i", "-", "1"}], "]"}], "]"}], "=", 
           RowBox[{
            RowBox[{"l", "[", 
             RowBox[{"[", 
              RowBox[{"i", "-", "1"}], "]"}], "]"}], "/", 
            RowBox[{"d", "[", 
             RowBox[{"[", 
              RowBox[{"i", "-", "1"}], "]"}], "]"}]}]}], ";", 
          RowBox[{
           RowBox[{"d", "[", 
            RowBox[{"[", "i", "]"}], "]"}], "=", 
           RowBox[{
            RowBox[{"d", "[", 
             RowBox[{"[", "i", "]"}], "]"}], "-", 
            RowBox[{
             RowBox[{"u", "[", 
              RowBox[{"[", 
               RowBox[{"i", "-", "1"}], "]"}], "]"}], "*", 
             RowBox[{"l", "[", 
              RowBox[{"[", 
               RowBox[{"i", "-", "1"}], "]"}], "]"}]}]}]}], ";", 
          "\[IndentingNewLine]", 
          RowBox[{
           RowBox[{"k", "[", 
            RowBox[{"[", "i", "]"}], "]"}], "=", 
           RowBox[{
            RowBox[{"k", "[", 
             RowBox[{"[", "i", "]"}], "]"}], "-", 
            RowBox[{
             RowBox[{"k", "[", 
              RowBox[{"[", 
               RowBox[{"i", "-", "1"}], "]"}], "]"}], "*", 
             RowBox[{"l", "[", 
              RowBox[{"[", 
               RowBox[{"i", "-", "1"}], "]"}], "]"}]}]}]}]}], "}"}], ";", 
        RowBox[{"i", "++"}]}]}], "]"}], ";", "\[IndentingNewLine]", 
     RowBox[{"n", "=", 
      RowBox[{"c", "-", "1"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"x", "=", 
      RowBox[{"Table", "[", 
       RowBox[{"i", ",", 
        RowBox[{"{", 
         RowBox[{"i", ",", "1", ",", "c"}], "}"}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"x", "[", 
       RowBox[{"[", "c", "]"}], "]"}], "=", 
      RowBox[{
       RowBox[{"k", "[", 
        RowBox[{"[", "c", "]"}], "]"}], "/", 
       RowBox[{"d", "[", 
        RowBox[{"[", "c", "]"}], "]"}]}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"While", "[", 
      RowBox[{
       RowBox[{"n", ">", "0"}], ",", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{"x", "[", 
           RowBox[{"[", "n", "]"}], "]"}], "=", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"k", "[", 
              RowBox[{"[", "n", "]"}], "]"}], "-", 
             RowBox[{
              RowBox[{"u", "[", 
               RowBox[{"[", "n", "]"}], "]"}], "*", 
              RowBox[{"x", "[", 
               RowBox[{"[", 
                RowBox[{"n", "+", "1"}], "]"}], "]"}]}]}], ")"}], "/", 
           RowBox[{"d", "[", 
            RowBox[{"[", "n", "]"}], "]"}]}]}], "}"}], ";", 
        RowBox[{"n", "--"}]}]}], "]"}], ";", "\[IndentingNewLine]", 
     RowBox[{"Return", "[", "x", "]"}]}]}], "]"}]}]], "Input",ExpressionUUID->\
"179c2c19-8bdc-44a4-b89f-25fc4115572b"],

Cell["\:548c", "Text",
 CellChangeTimes->{
  3.785040130284706*^9},ExpressionUUID->"8a067597-f7d8-4ea6-a554-\
7c25bb14500a"],

Cell["\:4e0d\:5f15\:5165k\:ff0c\:4e24\:8005\:7684\:7ed3\:679c\:4e0d\:4e00\
\:6837\:7684\:ff0c\:540e\:8005\:4f1a\:62a5\:9519\:ff0c\:8fd9\:662f\:4e3a\:4ec0\
\:4e48\:5462\:ff1f", "Text",
 CellChangeTimes->{{3.785040143501032*^9, 
  3.7850401727766914`*^9}},ExpressionUUID->"32fcec8b-2ed4-4b63-b1bf-\
ae585a25883f"]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1280, 637},
WindowMargins->{{-8, Automatic}, {Automatic, -8}},
FrontEndVersion->"11.3 for Microsoft Windows (64-bit) (2018\:5e743\:670828\
\:65e5)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 204, 3, 96, "Title",ExpressionUUID->"b0791c14-250a-412f-8d27-81adef44c641"],
Cell[CellGroupData[{
Cell[809, 29, 322, 5, 67, "Section",ExpressionUUID->"9db35d91-0bc2-484f-a75c-ac60a18e0d3d"],
Cell[1134, 36, 6542, 198, 272, "Input",ExpressionUUID->"f4847c1b-384f-4c4e-bf12-28fadfdf8aa1"],
Cell[7679, 236, 307, 8, 44, "Input",ExpressionUUID->"cf7b9e0a-e124-413a-872e-49951ff5792d"],
Cell[7989, 246, 345, 5, 34, "Text",ExpressionUUID->"ea3025a7-26f2-464a-8b66-eef3bf0208bc"]
}, Open  ]],
Cell[CellGroupData[{
Cell[8371, 256, 179, 3, 67, "Section",ExpressionUUID->"d617e1e2-0d7d-40ad-a907-96a1e952e1ce"],
Cell[8553, 261, 294, 5, 34, "Text",ExpressionUUID->"9ad820fb-c39d-49df-b389-ea2636cf9cd3"],
Cell[CellGroupData[{
Cell[8872, 270, 438, 10, 50, "Code",ExpressionUUID->"34717b11-a60f-4036-9839-a9573bd0cb67"],
Cell[9313, 282, 201, 3, 32, "Output",ExpressionUUID->"e3c26023-7402-473f-9097-b8a7e5b7176c"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[9563, 291, 177, 3, 67, "Section",ExpressionUUID->"81c8aa92-f632-46f5-bd78-5238b501856f"],
Cell[9743, 296, 253, 4, 34, "Text",ExpressionUUID->"5ddd9c39-b0f0-4315-b7a4-a3793e1b6342"]
}, Open  ]],
Cell[CellGroupData[{
Cell[10033, 305, 183, 3, 67, "Section",ExpressionUUID->"7876031e-7585-4d79-85ab-85be692dd090"],
Cell[10219, 310, 306, 8, 50, "Code",ExpressionUUID->"36366080-9797-4849-827e-6994399f8119"],
Cell[10528, 320, 406, 11, 50, "Code",ExpressionUUID->"2122d0b0-6cd5-4388-91b9-a5590ffb7967"],
Cell[CellGroupData[{
Cell[10959, 335, 423, 10, 50, "Code",ExpressionUUID->"d9bd346b-6413-4f1e-8d02-60ae0e08fd36"],
Cell[11385, 347, 663, 20, 106, "Output",ExpressionUUID->"29427d55-2ec1-40d3-b7fd-69ea0cbba050"]
}, Open  ]],
Cell[12063, 370, 264, 6, 34, "Text",ExpressionUUID->"7d3e1765-b77b-4b65-a5b4-22fbf0f4301e"],
Cell[CellGroupData[{
Cell[12352, 380, 256, 6, 50, "Code",ExpressionUUID->"c8899b80-5c4e-43d9-a1ad-be3b65fc739b"],
Cell[12611, 388, 183, 3, 32, "Output",ExpressionUUID->"3f324fcf-c178-4861-ab04-2d0fd74a05e6"]
}, Open  ]],
Cell[CellGroupData[{
Cell[12831, 396, 546, 16, 50, "Code",ExpressionUUID->"31498a72-acb8-4820-9487-d303b1dcc293"],
Cell[13380, 414, 666, 20, 123, "Output",ExpressionUUID->"1a5b3219-ec61-4ac7-95ac-d6624c25accc"]
}, Open  ]],
Cell[14061, 437, 186, 3, 34, "Text",ExpressionUUID->"0d898e99-e5f7-4e32-936a-f1cb78073d5c"],
Cell[14250, 442, 313, 7, 50, "Code",ExpressionUUID->"7456b96c-3eed-43f3-9daa-498e002137c1"],
Cell[14566, 451, 290, 6, 42, "Subsubsection",ExpressionUUID->"0c601505-6dae-40b1-b0c8-fd076877ff42"],
Cell[CellGroupData[{
Cell[14881, 461, 176, 3, 37, "Subsection",ExpressionUUID->"dae2e418-d993-4db3-9730-c6d89f3e6452"],
Cell[CellGroupData[{
Cell[15082, 468, 531, 13, 45, "Input",ExpressionUUID->"e7169940-c3f9-40f6-aa17-69f2a8fa2cdd"],
Cell[15616, 483, 339, 8, 32, "Output",ExpressionUUID->"5e29dc01-4ea3-415d-a96c-9b10117a271a"]
}, Open  ]],
Cell[15970, 494, 189, 3, 34, "Text",ExpressionUUID->"4ba60dda-70f2-4959-8c7a-b83465972905"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16196, 502, 175, 3, 53, "Subsection",ExpressionUUID->"2912760d-b74b-4577-a5fb-a2b0685032d4"],
Cell[16374, 507, 286, 4, 34, "Text",ExpressionUUID->"dca55732-5f2c-460d-89be-1e0e696cea5c"]
}, Open  ]],
Cell[CellGroupData[{
Cell[16697, 516, 190, 3, 53, "Subsection",ExpressionUUID->"03ff4d8b-e352-46fb-a85d-7162656ddae6"],
Cell[CellGroupData[{
Cell[16912, 523, 1129, 28, 45, "Input",ExpressionUUID->"cfeb1856-ba51-4d20-8fbc-6eff75490876"],
Cell[18044, 553, 412, 12, 32, "Output",ExpressionUUID->"77a9e881-1e5c-4841-8f8c-a94dbd9f91a9"]
}, Open  ]],
Cell[18471, 568, 363, 9, 34, "Text",ExpressionUUID->"e9240b24-8363-492f-8599-8b8c90f4012f"],
Cell[18837, 579, 156, 3, 28, "Input",ExpressionUUID->"4272c8ac-899b-4083-a0ad-9c5501a8b83e"]
}, Open  ]],
Cell[19008, 585, 170, 3, 53, "Subsection",ExpressionUUID->"9f251f11-abc9-4fb1-8d36-0e0443845e8c"],
Cell[CellGroupData[{
Cell[19203, 592, 174, 3, 37, "Subsection",ExpressionUUID->"af14e2a2-35a4-4de2-b726-88165dde651d"],
Cell[19380, 597, 349, 5, 34, "Text",ExpressionUUID->"00dc9872-629a-4b69-849d-01b8b7febe92"],
Cell[19732, 604, 407, 8, 48, "Input",ExpressionUUID->"3d8fa36e-d48b-406b-b0ff-576831c1a8d1"],
Cell[20142, 614, 334, 7, 42, "Subsubsection",ExpressionUUID->"822388ad-513a-49e1-bb86-b274f14dd256"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[20525, 627, 74, 0, 67, "Section",ExpressionUUID->"581165c8-364a-4c80-9aa0-7f36b64defaf"],
Cell[20602, 629, 228, 4, 34, "Text",ExpressionUUID->"92308502-4e79-4874-8415-8769842fed6b"],
Cell[CellGroupData[{
Cell[20855, 637, 440, 12, 45, "Input",ExpressionUUID->"66cddb72-a668-463d-be57-b9325d145a68"],
Cell[21298, 651, 160, 3, 32, "Output",ExpressionUUID->"176c9cb0-ec40-45a6-9ac8-ed2721ee80c5"]
}, Open  ]],
Cell[21473, 657, 198, 3, 34, "Text",ExpressionUUID->"505b367d-c02b-4980-9948-03e314a8ccf3"],
Cell[CellGroupData[{
Cell[21696, 664, 356, 10, 45, "Input",ExpressionUUID->"5d03b378-e22b-4695-aacd-100a7df57251"],
Cell[22055, 676, 1625, 45, 60, "Output",ExpressionUUID->"56abf7fe-ed28-4a02-bd2a-1cb3c0d950b7"]
}, Open  ]],
Cell[23695, 724, 202, 3, 34, "Text",ExpressionUUID->"a5a0bce5-9cc3-4b71-b65b-a74cbf429d47"],
Cell[23900, 729, 304, 7, 45, "Input",ExpressionUUID->"0c501d7b-9dbb-42ed-bca0-9178a7f0ef69"],
Cell[CellGroupData[{
Cell[24229, 740, 336, 8, 45, "Input",ExpressionUUID->"31bcd2b8-6e24-43b0-b05f-1380afd68b41"],
Cell[24568, 750, 525, 13, 32, "Output",ExpressionUUID->"049b48a5-0b46-4879-9e77-f6f3a9f09674"]
}, Open  ]],
Cell[25108, 766, 510, 13, 45, "Input",ExpressionUUID->"08a13c17-d6b0-49ef-9bf2-ecfa65846553"],
Cell[25621, 781, 329, 10, 8, "Text",ExpressionUUID->"0c43c13a-3fd9-4e81-aafb-fb1d826afb9c"],
Cell[25953, 793, 242, 4, 34, "Text",ExpressionUUID->"64d4a664-42c1-49ff-b826-1c6cfed78ffe"],
Cell[26198, 799, 9057, 265, 166, "Output",ExpressionUUID->"85a2ebde-c33f-42b7-91a2-189f60d000b7"],
Cell[CellGroupData[{
Cell[35280, 1068, 475, 13, 45, "Input",ExpressionUUID->"5c492378-dde6-4f04-a90e-0b2aad6e6540"],
Cell[35758, 1083, 523, 11, 24, "Message",ExpressionUUID->"13b2747a-e189-4c85-9740-6e80f9be1d43"]
}, Open  ]],
Cell[36296, 1097, 236, 4, 34, "Text",ExpressionUUID->"b9e6b397-d837-41ff-a932-e915f70b7cae"],
Cell[CellGroupData[{
Cell[36557, 1105, 332, 7, 45, "Input",ExpressionUUID->"83c0d8f9-8db8-4c90-b68b-d75a70b9d631"],
Cell[36892, 1114, 7663, 230, 147, "Output",ExpressionUUID->"edfb1e6b-d01c-46c9-a294-e3957a5ea27d"]
}, Open  ]],
Cell[44570, 1347, 156, 3, 28, "Input",ExpressionUUID->"4031cdaa-5bf6-425c-9d05-bd901b56239f"],
Cell[44729, 1352, 329, 10, 8, "Text",ExpressionUUID->"6080ea13-64d7-42cd-b5da-4ec8c7cb34d2"],
Cell[45061, 1364, 216, 4, 28, "Input",ExpressionUUID->"48a2b581-74c6-47a6-b415-b297b90dca11"],
Cell[CellGroupData[{
Cell[45302, 1372, 840, 25, 45, "Input",ExpressionUUID->"19478e62-148f-42a1-b6b9-7e7909722743"],
Cell[CellGroupData[{
Cell[46167, 1401, 203, 4, 22, "Print",ExpressionUUID->"7ae1db70-482a-4bde-853b-e6daea80e3dc"],
Cell[46373, 1407, 205, 4, 22, "Print",ExpressionUUID->"81480576-8415-4f52-b156-903cd4b08ce4"],
Cell[46581, 1413, 205, 4, 22, "Print",ExpressionUUID->"f4af2852-a419-48e0-b603-eea78de11d40"],
Cell[46789, 1419, 204, 4, 22, "Print",ExpressionUUID->"5a6cdd9d-03ac-474b-8ecf-cfbcbfcce986"]
}, Open  ]]
}, Open  ]],
Cell[47020, 1427, 589, 17, 45, "Input",ExpressionUUID->"ab25118d-b706-4dc2-b77d-51ebef4e93d9"],
Cell[47612, 1446, 275, 4, 34, "Text",ExpressionUUID->"109a586c-0445-4a8c-91e6-2926c01a8d59"],
Cell[CellGroupData[{
Cell[47912, 1454, 801, 24, 45, "Input",ExpressionUUID->"1ad9a826-baf9-4de2-b4cb-83bfcf969050"],
Cell[CellGroupData[{
Cell[48738, 1482, 177, 4, 22, "Print",ExpressionUUID->"6b7f985b-95c1-4832-a5ef-08bfca7451ea"],
Cell[48918, 1488, 177, 4, 22, "Print",ExpressionUUID->"043d5f3d-faa0-49e6-b703-37f1cfd3f37b"],
Cell[49098, 1494, 177, 4, 22, "Print",ExpressionUUID->"9f2631e0-9cd3-4e12-9bbc-c19f4b57520a"],
Cell[49278, 1500, 178, 4, 22, "Print",ExpressionUUID->"5fa5c29e-4886-48bd-bb72-c5b785bd915d"],
Cell[49459, 1506, 178, 4, 22, "Print",ExpressionUUID->"e3322224-3568-4d0e-bdc3-d98032c959c0"],
Cell[49640, 1512, 178, 4, 22, "Print",ExpressionUUID->"2f7a9e63-2912-4e21-baa8-85fa698ad2d6"],
Cell[49821, 1518, 180, 4, 22, "Print",ExpressionUUID->"f0c21559-22b7-435c-baf5-942d9c70d84e"],
Cell[50004, 1524, 178, 4, 22, "Print",ExpressionUUID->"657ee328-8194-4687-8342-def7e5e8bc13"],
Cell[50185, 1530, 178, 4, 22, "Print",ExpressionUUID->"ff4c2656-dbea-4b06-8a5d-a2054b28f28e"],
Cell[50366, 1536, 179, 4, 22, "Print",ExpressionUUID->"f83b3a53-b93a-4c0d-9ea3-0130cc65310f"],
Cell[50548, 1542, 181, 4, 22, "Print",ExpressionUUID->"8a9bfa25-aee7-4015-a60c-7831055c1582"],
Cell[50732, 1548, 181, 4, 22, "Print",ExpressionUUID->"39961c92-5314-42cb-baab-75128707a424"],
Cell[50916, 1554, 179, 4, 22, "Print",ExpressionUUID->"17ecca1d-65f0-434f-a023-852354c3705e"],
Cell[51098, 1560, 179, 4, 22, "Print",ExpressionUUID->"2e0d23b4-aa5c-4e81-aa8c-ff4d771e67aa"],
Cell[51280, 1566, 178, 4, 22, "Print",ExpressionUUID->"f62d4069-3062-4f6d-a01a-e99e8a1990e5"],
Cell[51461, 1572, 181, 4, 22, "Print",ExpressionUUID->"7b67cf10-631e-4176-a8c6-a66bc14fbd36"],
Cell[51645, 1578, 181, 4, 22, "Print",ExpressionUUID->"3e8d8c7f-9775-4129-ab18-116149706487"],
Cell[51829, 1584, 178, 4, 22, "Print",ExpressionUUID->"3a512592-3973-475b-a63c-e1832c306128"],
Cell[52010, 1590, 181, 4, 22, "Print",ExpressionUUID->"34f9ecb2-f45d-44d0-8706-5d9800698b2e"],
Cell[52194, 1596, 181, 4, 22, "Print",ExpressionUUID->"9f57bea9-9af4-4c6e-8b3b-390f64e8a25a"],
Cell[52378, 1602, 181, 4, 22, "Print",ExpressionUUID->"459ce302-0909-4288-ab5f-55eed34d81da"],
Cell[52562, 1608, 178, 4, 22, "Print",ExpressionUUID->"b80ca90c-f438-487c-bb3d-69823211b503"]
}, Open  ]]
}, Open  ]],
Cell[52767, 1616, 260, 4, 34, "Text",ExpressionUUID->"e7d8c53b-a135-4763-8292-d2cef63aed9b"],
Cell[53030, 1622, 329, 10, 8, "Text",ExpressionUUID->"1a5fa7a4-7364-420b-8a43-d812386ab98f"],
Cell[53362, 1634, 4616, 133, 436, "Input",ExpressionUUID->"179c2c19-8bdc-44a4-b89f-25fc4115572b"],
Cell[57981, 1769, 124, 3, 34, "Text",ExpressionUUID->"8a067597-f7d8-4ea6-a554-7c25bb14500a"],
Cell[58108, 1774, 311, 5, 34, "Text",ExpressionUUID->"32fcec8b-2ed4-4b63-b1bf-ae585a25883f"]
}, Open  ]]
}, Open  ]]
}
]
*)

